From: Richard M. Stallman Date: Sun, 7 Sep 1997 18:32:24 +0000 (+0000) Subject: (load-with-code-conversion): X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~79273 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=0b79b2ace8aae013282ef814b1f4dcd75057edf7;p=emacs.git (load-with-code-conversion): Use third arg to eval-buffer and don't set buffer-file-name. --- diff --git a/lisp/international/mule.el b/lisp/international/mule.el index 104991bdcf7..66e82575ec4 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -58,13 +58,10 @@ Return t if file exists." ;; This is buffer-local. (setq enable-multibyte-characters t) (insert-file-contents fullname) - ;; We must set `buffer-file-name' for `eval-buffer' and - ;; `load-history'. - (setq buffer-file-name file) ;; Make `kill-buffer' quiet. (set-buffer-modified-p nil)) ;; Eval in the original buffer. - (eval-buffer buffer)) + (eval-buffer buffer nil file)) (let (kill-buffer-hook kill-buffer-query-functions) (kill-buffer buffer))) (let ((hook (assoc file after-load-alist)))